x <- 1
y <-
c(1.0, 1.0, 1.0)
Z <-
structure(c(1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0, 1.0), .Dim = c(4, 5))
